Out parameter funkce
Otázka od: Pavel Poles
29. 10. 2002 16:04
Zdravim,
mam maly problem 
... Mam aplikacni server, ke kteremu pristupuji pomoci
DCOM.
Tento server ma nejakou funkci, ktera ma navratovou hodnotu, a ma 3
parametry, 2 in a 1 out.
V ramci App Serveru tuto hodnotu menim a pracuji s ni, to vse funguje, ale
jakmile ji chci ziskat
v ramci klienta tak se nic nedeje. Proste Apliakcni server vubec nic
neposle...
Viz kod:
Aplikacni server:
function TSrvADO.Login(const Pass, LoginName: WideString;
out UserID: Word): Word;
begin
...
UserID:=666;
...
end;
Klient:
var
j: word;
...
j:=5;
DCOMConnection.AppServer.Login('neco','neco', j);
Edit1.Text:=IntToStr(j); // j by melo byt 666, ale je stale 5
...
Predem dekuji za rady....
Pavel Poles
Odpovedá: delfi
30. 10. 2002 9:17
HI,
pokud predavam data z apl. serveru tak to pouzivam takto a v pohode:
procedure LoadINI(aId: Integer; const aName: WideString; var aIniForm,
aIniGrid, aIniMenu, aIniLayout, aIniPrint: WideString); safecall;
Ales
----- Original Message -----
From: "Pavel Poles" <poles@student.fsid.cvut.cz>
To: <delphi-l@clexpert.cz>
Sent: Tuesday, October 29, 2002 3:43 PM
Subject: Out parameter funkce
> Zdravim,
>
> mam maly problem ... Mam aplikacni server, ke kteremu pristupuji pomoci
> DCOM.
---
Odchozí zpráva neobsahuje viry.
Zkontrolováno antivirovým systémem AVG (http://www.grisoft.cz).
Verze: 6.0.406 / Virová báze: 229 - datum vydání: 21.10.2002